;
; Compile the net259 homepage
;

failat 21
stack 100000

pcd at:www/x

; buildup list of nodes in 2:259
gfindxxx >RAM:259t n 2:259/* #? lformat="%t<!-- %D --> <TR><TD>%S<TD> %3<TD> <A HREF=%qmailto:%g.fido.zetnet.co.uk%q>%s</A><TD> %l<TD> %O<TD> %i" quiet

; 'alter' it
awk -f at:www/make259.awk ram:259t >ram:259tt

; Join parts and add update date...
type fido259h.html >RAM:fido259.html
type RAM:259tt >>RAM:fido259.html
echo "</TABLE><P>Table last updated " >>RAM:fido259.html NOLINE
echo `date` >>RAM:fido259.html
echo ", using " >>RAM:fido259.html NOLINE
echo `dir nodelist:nodelist.???` >>RAM:fido259.html
echo "</P>" >>RAM:fido259.html
type fido259t.html >>RAM:fido259.html
delete RAM:259t#? QUIET

; Finishup
delete >NIL: at:www/fido259#?.html
copy ram:fido259.html TO AT:www/ QUIET
delete >NIL: RAM#?.html

; And while we are at it, lets archive
cd at:www
delete >NIL: www.lha
lha >NIL: a www.lha #?

; fini, cd back to where we were...
pcd